#include "stdafx.h"
#pragma warning (disable : 4251)
#include "include\Gs.h"

int print(Gs::IContext *ctx)
{
	Gs::IString *s = ctx->ValueAt()->ToString(ctx);
	printf("%s\n", s->GetCString());
	return 0;
}

int main(int argc, char *argv[])
{
	Gs::IContext *ctx = Gs::CreateContext();
	if (ctx)
	{
		ctx->Push(print);
		ctx->SetGlobal("print");
		
		ctx->PushGlobal("print");
		ctx->Push("Hello, world!");
		ctx->Call(1);
		
	}
	ctx->Release();

	system("pause");
	return 0;
}

